home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Best of www.BestZips.com (Collector's Edition)
/
Best of WWW.BESTZIPS.COM Collector's Edition (JCSM Shareware) (JCS Marketing).ISO
/
prgtools
/
prtsut53.zip
/
SU1SRC.ZIP
/
FDEMO19.DFM
/
FDEMO19.txt
Wrap
Text File
|
1996-12-09
|
11KB
|
502 lines
object Form19: TForm19
Left = 197
Top = 366
BorderStyle = bsDialog
Caption = 'Demo 19'
ClientHeight = 367
ClientWidth = 596
Font.Color = clBlack
Font.Height = -14
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
PixelsPerInch = 120
Position = poScreenCenter
TextHeight = 16
object Label1: TLabel
Left = 11
Top = 12
Width = 175
Height = 18
Alignment = taCenter
Caption = 'Panel 1with CheckBoxes'
Color = clBtnFace
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Label2: TLabel
Left = 424
Top = 20
Width = 105
Height = 54
Caption = 'Panel 2 with a Radiogroup on Top'
Color = clBtnFace
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
WordWrap = True
end
object Label3: TLabel
Left = 216
Top = 20
Width = 127
Height = 54
Caption = 'Panel 3 with a DBRadiogroup on Top'
Color = clBtnFace
Font.Color = clNavy
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
WordWrap = True
end
object CancelBtn: TBitBtn
Left = 486
Top = 330
Width = 95
Height = 33
TabOrder = 0
Kind = bkCancel
Margin = 2
Spacing = -1
IsControl = True
end
object Panel1: TPanel
Left = 28
Top = 36
Width = 121
Height = 81
BorderStyle = bsSingle
TabOrder = 1
object CheckBox1: TCheckBox
Left = 12
Top = 8
Width = 97
Height = 17
Alignment = taLeftJustify
Caption = 'CheckBox1'
Font.Color = clFuchsia
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object CheckBox3: TCheckBox
Left = 12
Top = 32
Width = 97
Height = 17
Alignment = taLeftJustify
Caption = 'CheckBox3'
Font.Color = clFuchsia
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object CheckBox4: TCheckBox
Left = 12
Top = 56
Width = 97
Height = 17
Alignment = taLeftJustify
Caption = 'CheckBox4'
Font.Color = clFuchsia
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
end
object CheckBox2: TCheckBox
Left = 212
Top = 200
Width = 97
Height = 17
Caption = 'CheckBox2'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object RadioButton1: TRadioButton
Left = 212
Top = 176
Width = 113
Height = 17
Caption = 'RadioButton1'
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
object RadioGroup1: TRadioGroup
Left = 16
Top = 248
Width = 153
Height = 89
Caption = 'RadioGroup1'
Font.Color = clYellow
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 4
end
object RadioButton2: TRadioButton
Left = 28
Top = 268
Width = 113
Height = 17
Caption = 'RadioButton2'
Font.Color = clYellow
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 5
end
object RadioButton3: TRadioButton
Left = 28
Top = 288
Width = 113
Height = 17
Caption = 'RadioButton3'
Font.Color = clYellow
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 6
end
object RadioButton4: TRadioButton
Left = 28
Top = 308
Width = 113
Height = 17
Caption = 'RadioButton4'
Font.Color = clYellow
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 7
end
object Panel2: TPanel
Left = 396
Top = 72
Width = 185
Height = 113
TabOrder = 8
object RadioGroup2: TRadioGroup
Left = 8
Top = 8
Width = 169
Height = 97
Caption = 'RadioGroup2'
Font.Color = clOlive
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object RadioButton5: TRadioButton
Left = 32
Top = 32
Width = 113
Height = 17
Caption = 'RadioButton5'
Font.Color = clOlive
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
object RadioButton6: TRadioButton
Left = 32
Top = 56
Width = 113
Height = 17
Caption = 'RadioButton6'
Font.Color = clOlive
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
end
object RadioButton7: TRadioButton
Left = 32
Top = 80
Width = 113
Height = 17
Caption = 'RadioButton7'
Font.Color = clOlive
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 3
end
end
object DBRadioGroup1: TDBRadioGroup
Left = 12
Top = 144
Width = 169
Height = 73
Caption = 'DBRadioGroup1'
Font.Color = clRed
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 9
end
object DBCheckBox1: TDBCheckBox
Left = 24
Top = 168
Width = 121
Height = 17
Alignment = taLeftJustify
Caption = 'DBCheckBox1'
Font.Color = clRed
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 10
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object DBCheckBox2: TDBCheckBox
Left = 24
Top = 192
Width = 121
Height = 17
Alignment = taLeftJustify
Caption = 'DBCheckBox2'
Font.Color = clRed
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 11
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object Panel3: TPanel
Left = 192
Top = 80
Width = 185
Height = 81
TabOrder = 12
object DBRadioGroup2: TDBRadioGroup
Left = 8
Top = 8
Width = 165
Height = 65
Caption = 'DBRadioGroup2'
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
end
object DBCheckBox3: TDBCheckBox
Left = 24
Top = 28
Width = 121
Height = 17
Caption = 'DBCheckBox3'
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 1
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object DBCheckBox4: TDBCheckBox
Left = 24
Top = 48
Width = 121
Height = 17
Caption = 'DBCheckBox4'
Font.Color = clMaroon
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 2
ValueChecked = 'True'
ValueUnchecked = 'False'
end
end
object Button1: TButton
Left = 204
Top = 256
Width = 117
Height = 33
Caption = 'View Panel 1'
TabOrder = 13
OnClick = Button1Click
end
object Button2: TButton
Left = 204
Top = 288
Width = 117
Height = 33
Caption = 'View Panel 2'
TabOrder = 14
OnClick = Button2Click
end
object Button3: TButton
Left = 204
Top = 320
Width = 117
Height = 33
Caption = 'View Panel 3'
TabOrder = 15
OnClick = Button3Click
end
object Button4: TButton
Left = 324
Top = 256
Width = 185
Height = 33
Caption = 'View DBRadioGroup 1'
TabOrder = 16
OnClick = Button4Click
end
object Button5: TButton
Left = 324
Top = 288
Width = 185
Height = 33
Caption = 'View RadioGroup 1'
TabOrder = 17
OnClick = Button5Click
end
object Button6: TButton
Left = 324
Top = 320
Width = 117
Height = 33
Caption = 'View All'
TabOrder = 18
OnClick = Button6Click
end
object Memo1: TMemo
Left = 20
Top = 376
Width = 561
Height = 141
Alignment = taCenter
Lines.Strings = (
'This command is trying to View DBRadioGroup1 but the result'
'is that only the the Frame is viewed. The reason for that is tha' +
't'
'the DBCheckBoxes displayed inside the DBRadioGroup are'
'not children of the DBRadioGroup. '
''
'To get past this problem, rather use a TPanel with the '
'DBRadioGroup on top and then use the Panel as the TWinControl'
'to print.')
TabOrder = 19
Visible = False
end
object Memo2: TMemo
Left = 16
Top = 380
Width = 561
Height = 141
Alignment = taCenter
Lines.Strings = (
'This command is trying to View RadioGroup1 but the result'
'is that only the the Frame is viewed. The reason for that is tha' +
't'
'the RadioButtons displayed inside the RadioGroup are'
'not children of the RadioGroup. '
''
'To get past this problem, rather use a TPanel with the '
'RadioGroup on top and then use the Panel as the TWinControl'
'to print like Panel2')
TabOrder = 20
Visible = False
end
object DBPrintWin1: TDBPrintWin
About = 'Version 5.32'
AboutRegistered = 'TOM SNIDER'
HeaderFont.Color = clWindowText
HeaderFont.Height = 16
HeaderFont.Name = 'Arial'
HeaderFont.Style = []
Font.Color = clWindowText
Font.Height = 16
Font.Name = 'Arial'
Font.Style = []
FooterFont.Color = clWindowText
FooterFont.Height = 12
FooterFont.Name = 'Arial'
FooterFont.Style = []
FrameObjects = True
clBtnFaceAsWhite = True
OutputTo = poViewer
Orientation = Default
Units = poInches
ViewButtonVisible = False
ShowCancelDialog = True
LineWidth = 0
Copies = 1
GridBackDrop = False
GridBackDropUnits = poInches
ZoomPercentage = 25.000000000000000000
HeaderTop = 0.500000000000000000
HeaderLeft = 0.500000000000000000
HeaderStringLeft = ' '
HeaderStringCenter = ' '
HeaderStringRight = ' '
HeaderEnabled = True
HeaderOutlined = False
HeaderFilled = False
TextColor = clBlack
ViewBkColor = 11234567
ViewHeading = 'Printit Viewer'
HeadingColor = clSilver
FrameStyle = frThin
FooterTop = 10.170000000000000000
FooterString = ' '
FooterEnabled = True
FooterOutlined = False
FooterFilled = False
FixSansSerif = True
FooterStringLeft = 'Printed on @Date at @Time'
FooterStringRight = 'Page @Page'
BorderLeft = 0.500000000000000000
BorderRight = 0.500000000000000000
LineSpacing = 2.800000000000000000
Left = 376
Top = 192
end
end